(indent-line-to): Fix off-by-one bug when deciding

whether to delete the existing spaces.

diff --git a/lisp/indent.el b/lisp/indent.el
index c1e2fc2e1324394985946d670f406080321bd6be..5b69fab958a702dcbea973b5ed2473f0527420ea 100644 (file)
--- a/lisp/indent.el
+++ b/lisp/indent.el
@@ -84,7 +84,7 @@ only if necessary.  It leaves point at end of indentation."
   (back-to-indentation)
   (let ((cur-col (current-column)))
     (cond ((< cur-col column)
-          (if (> (- column (* (/ cur-col tab-width) tab-width)) tab-width)
+          (if (>= (- column (* (/ cur-col tab-width) tab-width)) tab-width)
               (delete-region (point)
                              (progn (skip-chars-backward " ") (point))))
           (indent-to column))